home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / fish / 751-760 / 754 / softrack / getunitid.s < prev    next >
Text File  |  1995-03-18  |  294b  |  17 lines
  1.  
  2.  ;GetUnitID.Written by Kamran Karimi.To be Assembled with Cape Assembler
  3.  ;and linked with blink to produce SofTrack
  4.  
  5. DR_GetUnitID equ -30
  6.  
  7.  XDEF _GetUnitID
  8.  XREF _DiskBase
  9.  
  10. _GetUnitID:
  11.  move.l  a6,-(a7)
  12.  move.l  8(a7),d0
  13.  move.l  _DiskBase,a6
  14.  jsr     DR_GetUnitID(a6)
  15.  move.l  (a7)+,a6
  16.  rts
  17.